home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d19 / prodor31.arc / PRO-T.BAT < prev    next >
DOS Batch File  |  1989-10-08  |  1KB  |  70 lines
  1. @echo off
  2. echo off
  3. rem -- pro-t.bat - process "test" archive request - for ProDOOR 3.1
  4. rem -- %1-resultfile, %2 sourcefile
  5.  
  6. chkpath testfile %0 >>%1
  7. if errorlevel 1 goto end
  8. testfile %2 arc zip pak lzh zoo
  9. if errorlevel == 98 goto cant_handle
  10. if errorlevel == 5 goto zoo
  11. if errorlevel == 4 goto lzh
  12. if errorlevel == 3 goto pak
  13. if errorlevel == 2 goto zip
  14. if errorlevel == 1 goto arc
  15. goto end
  16.  
  17. :zoo
  18. chkpath zoo %0 >>%1
  19. if errorlevel 1 goto end
  20. zoo -test >>%1 %2
  21. if errorlevel 1 goto error
  22. goto end
  23.  
  24. :arc
  25. chkpath pkunpak %0 >>%1
  26. if errorlevel 1 goto end
  27. pkunpak -t >>%1 %2
  28. if errorlevel 1 goto error
  29. goto end
  30.  
  31. :zip
  32. :chkpath zipds %0 >>%1
  33. :if errorlevel 1 goto end
  34. :zipds >>%1 %2
  35. chkpath pkunzip %0 >>%1
  36. if errorlevel 1 goto end
  37. pkunzip -t >>%1 %2
  38. if errorlevel 1 goto error
  39. goto end
  40.  
  41. :pak
  42. chkpath pak %0 >>%1
  43. if errorlevel 1 goto end
  44. pak t >>%1 %2
  45. if errorlevel 1 goto error
  46. goto end
  47.  
  48. :lzh
  49. chkpath lharc %0 >>%1
  50. if errorlevel 1 goto end
  51. rem lharc 1.12 or later required for test function to work
  52. lharc t /v >>%1 %2
  53. if errorlevel 1 goto error
  54. goto end
  55.  
  56. :pack_error
  57. echo Y|del $$$$ >nul
  58. rmdir $$$$
  59. goto error
  60.  
  61. :error
  62. echo. >>%1
  63. echo %0: Error were detected while processing %2 ! >>%1
  64. goto end
  65.  
  66. :cant_handle
  67. echo Sorry, %0 does not know how to process %2 ! >>%1
  68.  
  69. :end
  70.